home *** CD-ROM | disk | FTP | other *** search
/ Power Bytes: Money & Finance / PowerBytes Money and Finance CD-ROM 01 / PowerBytes Money and Finance CD-ROM 01.iso / HyperCard Files / MacMathPascal / card_3848.txt < prev    next >
Encoding:
Text File  |  1988-09-05  |  7.1 KB  |  137 lines

  1. -- card: 3848 from stack: in
  2. -- bmap block id: 2346
  3. -- flags: 0000
  4. -- background id: 2607
  5. -- name: Intro
  6. ----- HyperTalk script -----
  7. on opencard
  8.   --set the lockScreen to true
  9.   set visible of Field Documentation to False
  10.   set visible of Field Source to False
  11.   set visible of BACKGROUND button "Introduction" to False
  12.   set visible of BACKGROUND button "Create Program" to False
  13.   set visible of BACKGROUND button "Index" to true
  14. end opencard
  15. on CloseCard
  16.   set the lockScreen to true
  17.   set visible of Field Documentation to true
  18.   set visible of Field Source to true
  19.   set visible of BACKGROUND button "Introduction" to true
  20.   set visible of BACKGROUND button "Create Program" to true
  21. end CloseCard
  22.  
  23.  
  24.  
  25. -- part 2 (field)
  26. -- low flags: 01
  27. -- high flags: 0007
  28. -- rect: left=6 top=90 right=312 bottom=502
  29. -- title width / last selected line: 0
  30. -- icon id / first selected line: 0 / 0
  31. -- text alignment: 1
  32. -- font id: 3
  33. -- text size: 12
  34. -- style flags: 0
  35. -- line height: 16
  36. -- part name: 
  37.  
  38.  
  39. -- part 3 (button)
  40. -- low flags: 00
  41. -- high flags: 8004
  42. -- rect: left=72 top=316 right=338 bottom=185
  43. -- title width / last selected line: 0
  44. -- icon id / first selected line: 0 / 0
  45. -- text alignment: 1
  46. -- font id: 0
  47. -- text size: 12
  48. -- style flags: 0
  49. -- line height: 16
  50. -- part name: Print Order Form
  51. ----- HyperTalk script -----
  52. on mouseUp
  53.   go to card id 10729
  54. end mouseUp
  55.  
  56.  
  57.  
  58.  
  59. -- part 6 (button)
  60. -- low flags: 00
  61. -- high flags: 2000
  62. -- rect: left=381 top=41 right=57 bottom=403
  63. -- title width / last selected line: 0
  64. -- icon id / first selected line: 0 / 0
  65. -- text alignment: 1
  66. -- font id: 0
  67. -- text size: 12
  68. -- style flags: 0
  69. -- line height: 16
  70. -- part name: dodft
  71. ----- HyperTalk script -----
  72. on mouseUp
  73.   go to card id 9785
  74. end mouseUp
  75.  
  76.  
  77.  
  78.  
  79. -- part contents for card part 2
  80. ----- text -----
  81. This stack is the latest evolution in the MacMathPascal package.  Within this stack is  a collection of source listings for Pascal programs.  These programs contain procedures and functions to solve many of the types of problems which the engineer, scientist, or student faces daily.  There are  procedures to perform numeric calculus, curve fitting, interpolation, 
  82. plotting (the plots on the introduction cards were done with some of the routines), Fourier transforms, special functions, and solutions to equations.   
  83.  
  84.  
  85. As an added bonus, there is a card in this stack which performs a Discrete Fourier Transform (DFT).  To get to this card hit the Mac Icon on the screen.
  86.  
  87. The programs are  examples.  You can cut and paste the procedures from the source listings to include in custom programs.   This can save you several hours writing your own routines to perform daily tasks.  
  88. By a click of a button you can write the source for these progams to disk.  They are ready to compile and run with LightSpeed Pascal.  The documentaion for the programs is included in this stack.  This documention will explain what the routine does and how to use it.  There are also many references for the theory of operation of the routines given in the documentation.  
  89.  
  90. As always, there is a catch.  A return is expected for the hours  spent putting these routines together.  This stack is SHARE WARE!  The return  expected is a check for $25. 
  91.  
  92. As an incentive to have you send me money, a few things have been done.  First, the documentaion can not be printed.  If you want a copy, send in the money and you will be sent a printed and bound copy of the documentation and a disk with the latest version of this stack.
  93.  
  94. Second, if you are a registered owner of this stack and you give the stack to someone and they become registered you will be sent $5.  
  95.  
  96. To date, no one has ever been sued for using the routines in this stack without paying for them, but the author once graded the schoolarship paper of a person who used the routines without paying.
  97.  
  98. You can print an order form using the button below. 
  99. ____________________________________________________
  100.  
  101. DISCLAIMER
  102.  
  103. The MACMATPASCAL stack has been "PASSWORD PROTECTED" but that is not a guarantee. Neither Coherent Cognition nor Apple nor its software suppliers make any warranty or representation, either expressed or implied, with respect to the software in this stack, its quality, performance, merchantability or fitness for any particular purpose.  This software is sold "as is"; the purchaser assumes the entire risk as to it's quality and performance.
  104.  
  105. In no event will Coherent Cognition or Apple or its software suppliers be liable for direct, indirect, special, incidental, or consequential damages resulting from any defect in the software in this stack, even if they have been advised of the possibility of such damages.  In particular, they shall have no liability for any programs or data stored in or used with this stack.  
  106.  
  107. The warranty and remedies set forth above are exclusive and in lieu of all others, oral or written, expressed or implied.  No Coherent Cognition agent, dealer, author, or employee is authorized to make any modification, extension, or addition to this warranty.
  108.  
  109. Some states do not allow the exclusion or limitation of implied warranties or liability for incidental or consequential damages, so the above limitation or exclusion may not apply.  This warranty gives you specific legal rights, and you may also have other rights that vary from state to state.  
  110. ____________________________________________________ 
  111. GENERAL NOTES APPLICABLE FOR ALL ROUTINES
  112.  
  113. LightSpeed Pascal has double and extended precision variables.  A Pascal procedure which uses a large number or floating point numbers will run quicker if all of the variables are extended precision.  For examble, with 3600 points the FFT routine in this package will run 20% faster using extended percision.  The reason for this is simple.  All math is done in extended precision independent of the type of variables being used in the calculation.  If Real or Double floating point numbers are used, the CPU must convert the numbers to extended precision, perform the math, and then convert back to the Real or Double precision numbers.  The disadvantage of extended precision numbers is a use of memory.  They each occupy 10 bytes.   If your application can spare the space, it is a good idea to use the extended precision numbers. 
  114.  
  115. LightSpeed Pascal supports both a 2 and 4 byte integer.  Most of the time these can be used interchangeably.  
  116.  
  117. To make the conversion from various precision easy, the routines in this package use the following type declarations. 
  118.  
  119. TYPE
  120. FLOAT = EXTENDED or DOUBLE or REAL;
  121. FIXXED = INTEGER or LONGINT;
  122. DATA = ARRAY[1..MAXSIZE] of FLOAT;
  123. SQUARE = ARRAY[1..MAXSIZE,1..MAXSIZE] of FLOAT;
  124.  
  125. DATA and SQUARE are the single and two dimensional arrays used in the routines.  FLOAT is of the type EXTENDED, DOUBLE or REAL.    One or more of these Type declarations must be part of any program which uses the routines of this package. 
  126.  
  127.  
  128. A word about size.  The maximum amount of data that can be referenced in one VAR statement or program segment  in LightSpeed Pascal is 32K bytes.  This applies to version 1.1 of the compiler and this limit may be lifted in later versions.  
  129.  
  130. LightSpeedΓäó Pascal is a trademark of Symantec.  LightSpeedΓäó Pascal is also a great working environment.
  131.  
  132. Version 2.2
  133.  
  134.  
  135. -- part contents for background part 26
  136. ----- text -----
  137. 2